﻿Public Class main

    Private Sub IngresoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles IngresoToolStripMenuItem.Click
        login.MdiParent = Me
        login.Show()
    End Sub

    Private Sub SalirToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SalirToolStripMenuItem.Click
        If MsgBox("¿Está seguro que desea cerrar el programa?", MsgBoxStyle.YesNo, "Cerrar Aplicacion") = MsgBoxResult.Yes Then
            Me.Close()
        End If
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        UsuariosToolStripMenuItem.Enabled = False
        SucursalesToolStripMenuItem.Enabled = False
        BodegaToolStripMenuItem.Enabled = False
        EstudiosToolStripMenuItem.Enabled = False
        KitsToolStripMenuItem2.Enabled = False
        MovimientosToolStripMenuItem.Enabled = False
        MedicosToolStripMenuItem.Enabled = False
    End Sub

    Private Sub LogoutToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LogoutToolStripMenuItem.Click
        UsuariosToolStripMenuItem.Enabled = False
        SucursalesToolStripMenuItem.Enabled = False
        BodegaToolStripMenuItem.Enabled = False
        EstudiosToolStripMenuItem.Enabled = False
        KitsToolStripMenuItem2.Enabled = False
        MovimientosToolStripMenuItem.Enabled = False
        MedicosToolStripMenuItem.Enabled = False
        IngresoToolStripMenuItem.Enabled = True
        LogoutToolStripMenuItem.Enabled = False
    End Sub

    Private Sub MantenedorToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MantenedorToolStripMenuItem.Click
        Dim us As New man_usuarios
        us.MdiParent = Me
        us.Show()

    End Sub

    Private Sub SeguimientoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub MenuStrip1_ItemClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles MenuStrip1.ItemClicked

    End Sub
End Class
